cd "___YOUR_PATH_HERE___"
use post96_panel.dta

***** FIGURE 4 **********

#delimit ;

qui xtreg dkaopen crisis2 cabalance lngdp_ppp2000 lngdppc_ppp2000 gov_fce growth_gdppc2000
  ln_inf privcred_gdp reserves_imports savings trade peg polity2 counter lkaopen if year>1996 , fe;
estimates store mod1;

qui xtreg dckaopen crisis2 cabalance lngdp_ppp2000 lngdppc_ppp2000 gov_fce growth_gdppc2000
  ln_inf privcred_gdp reserves_imports savings trade peg polity2 counter lckaopen if year>1996 , fe;
estimates store mod2;

qui xtreg dk3 crisis2 cabalance lngdp_ppp2000 lngdppc_ppp2000 gov_fce growth_gdppc2000
  ln_inf privcred_gdp reserves_imports savings trade peg polity2 counter lk3 if year>1996 , fe;
estimates store mod3;

qui xtreg dckaopen crisis2 polity2 politycrisis cabalance lngdp_ppp2000 lngdppc_ppp2000 gov_fce growth_gdppc2000
  ln_inf privcred_gdp reserves_imports savings trade peg lckaopen counter if year>1996 , fe;
estimates store mod4;

qui xtreg dckaopen crisis2 polconiii polconiiicrisis cabalance lngdp_ppp2000 lngdppc_ppp2000 gov_fce growth_gdppc2000
  ln_inf privcred_gdp reserves_imports savings trade peg polity2 lckaopen counter if year>1996 , fe;
estimates store mod5;


esttab mod1 mod2 mod3 mod4 mod5, b(3) se(3) star(* 0.10 ** 0.05 *** 0.01) scalars(r2_w r2_b r2_o) 
  order(crisis2 polity2 politycrisis polconiii polconiiicrisis ) label;
esttab mod1 mod2 mod3 mod4 mod5 using table4.csv, b(3) se(3) star(* 0.10 ** 0.05 *** 0.01) scalars(r2_w r2_b r2_o) 
  order(crisis2 polity2 politycrisis polconiii polconiiicrisis ) replace nogap label;
